entry-point
start12

globals-size
7

code
(label clo car 0)
(move! (return-register) (builtin car (variable stk 0)))
(shrink-stack 1)
(return)
(label car)
(move! (return-register) (closure () (label clo car 0)))
(return)
(label clo cdr 0)
(move! (return-register) (builtin cdr (variable stk 0)))
(shrink-stack 1)
(return)
(label cdr)
(move! (return-register) (closure () (label clo cdr 0)))
(return)
(label clo cons 0)
(move!
  (return-register)
  (builtin cons (variable stk 1) (variable stk 0)))
(shrink-stack 2)
(return)
(label cons)
(move! (return-register) (closure () (label clo cons 0)))
(return)
(label clo null? 0)
(move! (return-register) (builtin null? (variable stk 0)))
(shrink-stack 1)
(return)
(label null?)
(move! (return-register) (closure () (label clo null? 0)))
(return)
(label clo print 0)
(move! (return-register) (builtin print (variable stk 0)))
(shrink-stack 1)
(return)
(label print)
(move! (return-register) (closure () (label clo print 0)))
(return)
(label clo do 0)
(extend-stack 1)
(push! (label return-address9))
(push! (env-register))
(push! (variable stk 5))
(call (variable stk 7))
(label return-address9)
(move! (variable stk 0) (return-register))
(push! (label return-address10))
(push! (env-register))
(push! (variable stk 4))
(call (variable stk 7))
(label return-address10)
(shrink-stack 5)
(return)
(label do)
(move! (return-register) (closure () (label clo do 0)))
(return)
(label moo)
(push! (label return-address11))
(push! (env-register))
(push! (variable glo 0))
(push! 'hello)
(push! 'worlde)
(push! (variable glo 4))
(call (variable glo 5))
(label return-address11)
(return)
(label (start12))
(push! (label start-cont13))
(push! (env-register))
(jump car)
(label start-cont13)
(move! (variable glo 0) (return-register))
(push! (label start-cont14))
(push! (env-register))
(jump cdr)
(label start-cont14)
(move! (variable glo 1) (return-register))
(push! (label start-cont15))
(push! (env-register))
(jump cons)
(label start-cont15)
(move! (variable glo 2) (return-register))
(push! (label start-cont16))
(push! (env-register))
(jump null?)
(label start-cont16)
(move! (variable glo 3) (return-register))
(push! (label start-cont17))
(push! (env-register))
(jump print)
(label start-cont17)
(move! (variable glo 4) (return-register))
(push! (label start-cont18))
(push! (env-register))
(jump do)
(label start-cont18)
(move! (variable glo 5) (return-register))
(push! (label start-cont19))
(push! (env-register))
(jump moo)
(label start-cont19)
(move! (variable glo 6) (return-register))
(exit)

